home *** CD-ROM | disk | FTP | other *** search
/ Developer Source 4 / developer source - volume 4.iso / parad / dec94 / bt_fig01.gif next >
Graphics Interchange Format  |  1996-07-10  |  10KB  |  634x476  |  4-bit (5 colors)
Labels: text | electronics | screenshot | display | software | number
OCR: SORT.LSL :: #Library1 :: arraySortX* method arraySortx(var a AyAny) var .. tempA AnyType swappedL Logical si SmallInt endVar swappedL = True while swappedL ; While any elements of the array are out of order. swappedL = False ; Check each element of the array except the last. for si from 1 to a.size() - 1 ; If the value of the element is greater than the value ; in the next element, swap them. if a[si] > a[si + 1] then tempA = a[si] a[si] = a[si + 1] a[si + 1] = tempA swappedL = True endIf endFor endWhile endmethod . . Edit Line: 16 Col: 35